﻿Imports Control.clases
Public Class Historial
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim id As Integer = Integer.Parse(Request.QueryString("id").ToString())
        Dim mantenimiento As New clsMantenimiento() 
        HistorialText.InnerHtml = mantenimiento.verHistorial(id)
    End Sub

    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Response.Redirect("Default.aspx")
    End Sub
End Class